'************************************************************************************
' Copyright © 2003-2005 Kathleen Dollard
'
' This software is provided 'as-is', without any express or implied warranty. In no 
' event will the author be held liable for any damages arising from the use of this
' software.
' 
' You may use this software for any purpose, including commercial applications, 
' and you may redistribute this software as part of application delivery: however, 
' this copyright notice may not be removed and you may not otherwise redistribute 
' this software directly other than providing a link to wwww.gendotnet.com. 
'
' You may alter this software to better server your needs (I'd like to hear about your 
' changes in order to make the software better). If you alter the softwre, you must  
' clearly mark it as altered and must not be misrepresented as the original software.
' nor wholly your original work.
'*************************************************************************************
Option Strict On
Option Explicit On 

Imports System

Namespace KADGen.Utility
   Public Class ExternalAssemblyRemoteLoader
      Inherits MarshalByRefObject

      '#Region "Class level declarations"
      '#End Region

#Region "Constructors"
      Public Sub New()
         'Diagnostics.Debug.WriteLine("Yo, dude")
      End Sub
#End Region

#Region "Public properties and methods"
      Public Sub LoadAssembly(ByVal fullName As String)
         Dim fileName As String
         Dim path As String
         Dim asm As Reflection.Assembly
         path = IO.Path.GetDirectoryName(fullName)
         fileName = IO.Path.GetFileNameWithoutExtension(fullName)
         'fileName = IO.Path.GetFileName(fullName)
         asm = Reflection.Assembly.LoadFile(fullName)
         'asm = AppDomain.CurrentDomain.Load(asm.GetName)
         'AppDomain.CurrentDomain.CreateInstanceFromAndUnwrap(fullName, "Tools")

      End Sub
#End Region

      '#Region "Private properties and methods"
      '#End Region

   End Class
End Namespace